(Fcall_process): When we make a bigger buffer for bufptr,

don't lose the data in it.

diff --git a/src/callproc.c b/src/callproc.c
index 21cfc11dd6606a7df2f5fc1a4d1ee816701aad7a..23f2b377b43e2c482f162a93e7975d7e4f14ede8 100644 (file)
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -897,8 +897,12 @@ usage: (call-process PROGRAM &optional INFILE BUFFER DISPLAY &rest ARGS)  */)
           but not past 64k.  */
        if (bufsize < 64 * 1024 && total_read > 32 * bufsize)
          {
+           char *tempptr;
            bufsize *= 2;
-           bufptr = (char *) alloca (bufsize);
+
+           tempptr = (char *) alloca (bufsize);
+           bcopy (bufptr, tempptr, bufsize / 2);
+           bufptr = tempptr;
          }
 
        if (!NILP (display) && INTERACTIVE)